home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1996 February / EnigmA AMIGA RUN 04 (1996)(G.R. Edizioni)(IT)[!][issue 1996-02][Skylink CD III].iso / earcd / e / ddmoduls.lha / dd_Modules / dd_system / geta4.e next >
Text File  |  1995-02-21  |  175b  |  16 lines
  1. OPT MODULE
  2.  
  3. EXPORT PROC storea4()
  4.   LEA a4storage(PC),A0
  5.   MOVE.L A4,(A0)
  6. ENDPROC
  7.  
  8. EXPORT PROC geta4()
  9.   LEA a4storage(PC),A0
  10.   MOVE.L (A0),A4
  11. ENDPROC
  12.  
  13. a4storage:
  14.   LONG NIL
  15.  
  16.